home *** CD-ROM | disk | FTP | other *** search
- object DialerDlg: TDialerDlg
- Left = 284
- Top = 269
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- BorderStyle = bsDialog
- Caption = 'Dialing'
- ClientHeight = 191
- ClientWidth = 354
- Font.Color = clBlack
- Font.Height = -18
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 120
- Position = poScreenCenter
- OnActivate = FormActivate
- TextHeight = 20
- object Label1: TLabel
- Left = 53
- Top = 14
- Width = 6
- Height = 29
- Alignment = taCenter
- Font.Color = clBlack
- Font.Height = -23
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Image1: TImage
- Left = 275
- Top = 45
- Width = 66
- Height = 61
- Center = True
- Picture.Data = {<image000.bmp>}
- end
- object Label2: TLabel
- Left = 179
- Top = 71
- Width = 4
- Height = 20
- Alignment = taRightJustify
- Font.Color = clBlack
- Font.Height = -18
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label3: TLabel
- Left = 111
- Top = 43
- Width = 6
- Height = 29
- Font.Color = clBlack
- Font.Height = -23
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object BitBtn2: TBitBtn
- Left = 180
- Top = 116
- Width = 95
- Height = 32
- Font.Color = clBlack
- Font.Height = -17
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = BitBtn2Click
- Kind = bkCancel
- end
- object Button1: TButton
- Left = 79
- Top = 116
- Width = 95
- Height = 32
- Caption = '&Answer'
- Font.Color = clBlack
- Font.Height = -17
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = Button1Click
- end
- object EStatusBar1: TEStatusBar
- Left = 0
- Top = 166
- Width = 354
- Height = 25
- Align = alBottom
- Alignment = taLeftJustify
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Enabled = True
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- SectMainBevel = sbIsDownUp
- SectDateBevel = sbLow
- SectTimeBevel = sbLow
- AlignTime = alRight
- AlignDate = alRight
- WidthDate = 80
- UpdateInterval = 0
- end
- object Timer1: TTimer
- OnTimer = Timer1Timer
- Left = 321
- Top = 3
- end
- end
-